home *** CD-ROM | disk | FTP | other *** search
/ Workplace Effectiveness: Critical Thinking Skills / Workplace Effectiveness: Critical Thinking Skills.iso / pc / Files / Whyfiles.dxr / 00004_PRINT & Write text file.ls < prev    next >
Encoding:
Text File  |  1998-09-14  |  5.2 KB  |  27 lines

  1. global gMasterData
  2.  
  3. on printButton
  4.   if iAmActivated(gMasterData) then
  5.     getPrintData()
  6.     set vThisField to string(getUserArea(gMasterData)) && "field"
  7.     print(the text of member vThisField)
  8.   else
  9.     alert("Printing is unavailable until an activity is completed.")
  10.   end if
  11. end
  12.  
  13. on getPrintData
  14.   set vThisField to string(getUserArea(gMasterData)) && "field"
  15.   set the text of member vThisField to EMPTY
  16.   set vTempText to EMPTY
  17.   put "Your Input from Why Files:" & RETURN & "--------------------------------------------------" & RETURN after vTempText
  18.   put "Sometimes authors include irrelevant information in their text. This information, while it may be interesting, has little to do with the purpose of the article.  Keeping a critical eye open for these often inconspicuous details will help you sharpen your focus upon the article's most important points." & RETURN & RETURN after vTempText
  19.   put "Read the message and then Zap the irrelevant statements by clicking on the sentence you believe is unnecessary and hitting the Zap button. Thanks for your help." & RETURN & RETURN after vTempText
  20.   put "Message 1" & RETURN & "Another earthquake had been reported in the southern tip of the Andes. It measured 6.5 on the Richter scale. Not a single global monitoring station recorded even the slightest tremor up to the earthquake itself. Unable to explain why there were not warnings, scientists from around the world have arrived to examine the suspicious cause of the earthquake. The cook at the base camp used the heat of escaping gases to prepare the first night's meal. Preliminary data indicate that a nuclear explosion is likely to be the trigger for this massive quake." & RETURN & RETURN & "Answer: The cook at the base camp used the heat of escaping gases to prepare the first night's meal." & RETURN & RETURN after vTempText
  21.   put "Message 2" & RETURN & "Residents on the 200 block of Marlowe Rd. told local health officials that a powerful stench has filled their houses. The source of the stench is oozing through their plumbing, filling sinks and tubs with an electric-green slime. Health officials sent to investigate the reports have returned with samples from the lab. The lab is located at 2450 Wilshire. Lab microbiologists there have been unable to identify the substance. One biologist was reported to have developed what appears to be the beginnings of a second thumb." & RETURN & RETURN & "Answer: The lab is located at 2450 Wilshire." & RETURN & RETURN after vTempText
  22.   put "Message 3" & RETURN & "Hikers around Spirit Lake in the panhandle of Idaho reported being startled by distant images of what appears to be the infamous Sasquatch. Intrigued by the oversized, hairy creature, the hikers wasted no time getting to the other side of the lake to pursue the creature with their cameras. Some of the hikers have Kodak's latest any-light-will-do-film. When they came upon the first track and realized the dimensions of the creature they were pursuing, the hikers decided they wanted a representative to return to camp to notify authorities. Those who remained agreed to limit their search to no more than 5 hours, thereby establishing a time officials could expect their return. If the hikers did not reappear within that time, the authorities would be expected to conduct an aerial search." & RETURN & RETURN & "Answer: Some of the hikers have Kodak's latest any-light-will-do-film." & RETURN & RETURN after vTempText
  23.   put "Message 4" & RETURN & "A mysterious magenta fog has buried the once cozy Scottish village of Shinness. Residents who have managed to escape the fog and reach Lairg report that all the clocks in the village have stopped keeping time. Telephones don't work, kitchen machines don't function, television screens produce only static, and something extraordinary is occurring in backyard gardens. Broccoli stanks have reached the second floor, carrots have broken plumbing pipes, lettuce heads have grown so large they obscure the neighbors' houses, and gargantuan onions cause residents' eyes to water. Mr. Fergus was heard to have said," && QUOTE & "I can hardly wait to enter this year's county fair. My turnips are bound to earn first place." & QUOTE & EMPTY & RETURN & RETURN & "Answer: Mr. Fergus was heard to have said," && QUOTE & "I can hardly wait to enter this year's county fair. My turnips are bound to earn first place." & QUOTE & EMPTY & RETURN & RETURN after vTempText
  24.   put "Message 5" & RETURN & "Fishermen returning from their night trawling off the coast of Nova Scotia reported seeing a sea creature twice the size of the largest boat in their fleet. The sighting occurred moments after an unexpected squall began pummeling the ships. Squalls like this sometimes occur in the early fall, but never in the month of July. The fishermen hauled in their nets and attempted to return to shore but their boats were slammed into each other like toys in a tub. No amount of physical force was enough to control the boats. Fishermen on the Amaranth witnessed 30 foot suckered tentacles reaching across the dec of the Mary Rose. The fishermen on the illfated boat never made it back to shore." & RETURN & RETURN & "Answer: Squalls like this sometimes occur in the early fall, but never in the month of July." & RETURN & RETURN after vTempText
  25.   set the text of member vThisField to vTempText
  26. end
  27.